home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / mac / SHARED.DIR / 01945_Script_Demo Buttons < prev    next >
Text File  |  1995-09-13  |  1KB  |  55 lines
  1. on DemoRollover whichbutton, howlong
  2.   ShowControl (whichbutton)
  3.   set count = 0
  4.   repeat while count < howlong
  5.     setDemoHilight (whichbutton)
  6.     wait .3
  7.     reset (whichbutton)
  8.     wait .3
  9.     set count = count + 1
  10.   end repeat
  11. end
  12.  
  13. on DemoRollover2 whichbutton1
  14.   ShowControl (whichbutton)
  15.   if soundbusy(1) then
  16.     setDemoHilight (whichbutton1)
  17.     wait .2
  18.   end if
  19. end
  20.  
  21. on DemoRollover3 whichbutton1
  22.   ShowControl (whichbutton)
  23.   if soundbusy(1) then
  24.     reset (whichbutton1)
  25.     wait .2
  26.   end if
  27. end
  28.  
  29. on DemoRolloverS whichbutton
  30.   ShowControl (whichbutton)
  31.   setDemoHilight (whichbutton)
  32.   wait .2
  33.   reset (whichbutton)
  34.   wait .2
  35.   if soundbusy(1) then
  36.     go the frame
  37.   end if
  38. end
  39.  
  40.  
  41. on MovieBoxRollover WhichCast1, whichcast2
  42.   puppetsprite 23, true
  43.   set count = 0
  44.   repeat while count < 6
  45.     set the castnum of sprite 23 = the number of cast whichcast2
  46.     updatestage
  47.     wait .3
  48.     set the castnum of sprite 23 = the number of cast whichcast1
  49.     updatestage
  50.     wait .3
  51.     set count = count + 1
  52.   end repeat
  53.   puppetsprite 23, false
  54. end
  55.